home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Monster Media 1996 #15
/
Monster Media Number 15 (Monster Media)(July 1996).ISO
/
prog_d
/
qrep10b.zip
/
BIOREP.DFM
/
BIOREP.txt
next >
Wrap
Text File
|
1996-04-09
|
7KB
|
312 lines
object Bioform: TBioform
Left = 293
Top = 204
Width = 774
Height = 352
HorzScrollBar.Range = 1200
VertScrollBar.Range = 2000
AutoScroll = False
Caption = 'Bioform'
Font.Color = clBlack
Font.Height = -13
Font.Name = 'Arial'
Font.Style = []
PixelsPerInch = 96
TextHeight = 16
object DetailBand: TQRBand
Left = 0
Top = 57
Width = 1200
Height = 152
Align = alTop
BandType = rbDetail
Color = clWhite
ForceNewPage = False
Frame.Width = 0
Ruler = qrrInchesHV
object QRDBText1: TQRDBText
Left = 116
Top = 12
width = 177
height = 17
DataSource = DataSource1
DataField = 'Common_Name'
end
object QRDBText3: TQRDBText
Left = 116
Top = 60
width = 177
height = 17
DataSource = DataSource1
DataField = 'Category'
end
object QRLabel1: TQRLabel
Left = 8
Top = 12
width = 105
height = 16
Caption = 'Common name :'
AlignToBand = False
Font.Color = clBlack
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object QRDBText4: TQRDBText
Left = 116
Top = 36
width = 177
height = 17
DataSource = DataSource1
DataField = 'Species Name'
end
object QRLabel2: TQRLabel
Left = 8
Top = 36
width = 77
height = 16
Caption = 'Real name :'
AlignToBand = False
Font.Color = clBlack
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object QRLabel3: TQRLabel
Left = 8
Top = 60
width = 65
height = 16
Caption = 'Category :'
AlignToBand = False
Font.Color = clBlack
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object QRDBText5: TQRDBText
Left = 116
Top = 84
width = 37
height = 17
DataSource = DataSource1
DataField = 'Length (cm)'
end
object QRLabel4: TQRLabel
Left = 8
Top = 84
width = 68
height = 16
Caption = 'Size (CM) :'
AlignToBand = False
Font.Color = clBlack
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object QRLabel5: TQRLabel
Left = 8
Top = 124
width = 79
height = 16
Caption = 'Description :'
AlignToBand = False
Font.Color = clBlack
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object QRDBText2: TQRDBText
Left = 116
Top = 124
width = 581
height = 17
DataSource = DataSource1
DataField = 'Notes'
end
object DBImage1: TDBImage
Left = 352
Top = 12
Width = 169
Height = 105
DataField = 'Graphic'
DataSource = DataSource1
Stretch = True
TabOrder = 0
end
end
object TitleBand: TQRBand
Left = 0
Top = 0
Width = 1200
Height = 57
Align = alTop
BandType = rbTitle
Color = clWhite
ForceNewPage = False
Frame.Width = 0
Ruler = qrrNone
object Image1: TImage
Left = 12
Top = 4
Width = 69
Height = 33
Picture.Data = {<image000.bmp>}
Stretch = True
end
object QRLabel6: TQRLabel
Left = 96
Top = 4
width = 193
height = 36
Caption = 'QuickReport'
AlignToBand = False
Font.Color = 8404992
Font.Height = -32
Font.Name = 'Arial'
Font.Style = [fsBold, fsItalic]
ParentFont = False
end
object QRLabel7: TQRLabel
Left = 300
Top = 20
width = 61
height = 16
Caption = 'for Delphi'
AlignToBand = False
Font.Color = 8404992
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold, fsItalic]
ParentFont = False
end
object QRLabel8: TQRLabel
Left = 572
Top = 20
width = 167
height = 16
Caption = 'Copyright (c) 1996 QSD AS'
AlignToBand = False
Font.Color = clBlack
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold, fsItalic]
ParentFont = False
end
object QRShape2: TQRShape
Left = 8
Top = 44
width = 733
Height = 5
Brush.Color = clNavy
Shape = qrsRectangle
end
end
object QRBand1: TQRBand
Left = 0
Top = 209
Width = 1200
Height = 8
Align = alTop
BandType = rbDetail
Color = clWhite
ForceNewPage = False
Frame.Width = 0
Ruler = qrrNone
object QRShape1: TQRShape
Left = 8
Top = 3
width = 737
Height = 1
Shape = qrsRectangle
end
end
object QRBand2: TQRBand
Left = 0
Top = 217
Width = 1200
Height = 24
Align = alTop
BandType = rbPageFooter
Color = clWhite
ForceNewPage = False
Frame.Width = 0
Ruler = qrrNone
object QRSysData1: TQRSysData
Left = 676
Top = 4
width = 65
height = 17
Alignment = taRightJustify
AlignToBand = True
Data = qrsPageNumber
Text = 'Page '
end
end
object Table1: TTable
Active = True
DatabaseName = 'DBDEMOS'
TableName = 'BIOLIFE.DB'
Left = 36
Top = 272
object Table1SpeciesNo: TFloatField
FieldName = 'Species No'
end
object Table1Category: TStringField
FieldName = 'Category'
Size = 15
end
object Table1Common_Name: TStringField
FieldName = 'Common_Name'
Size = 30
end
object Table1SpeciesName: TStringField
FieldName = 'Species Name'
Size = 40
end
object Table1Lengthcm: TFloatField
FieldName = 'Length (cm)'
end
object Table1Length_In: TFloatField
FieldName = 'Length_In'
end
object Table1Notes: TMemoField
FieldName = 'Notes'
Size = 50
end
object Table1Graphic: TGraphicField
FieldName = 'Graphic'
end
end
object DataSource1: TDataSource
DataSet = Table1
Left = 68
Top = 272
end
object Biorep: TQuickReport
DataSource = DataSource1
ColumnMarginInches = 0
ColumnMarginMM = 0
Columns = 1
DisplayPrintDialog = False
LeftMarginInches = 0
LeftMarginMM = 0
Orientation = poPortrait
PaperLength = 0
PaperSize = qrpDefault
PaperWidth = 0
PrintOrder = qrColByCol
ReportTitle = 'QuickReport Biolife demo report'
RestartData = True
SQLCompatible = False
TitleBeforeHeader = False
Left = 4
Top = 272
end
end